home *** CD-ROM | disk | FTP | other *** search
/ The CICA Windows Explosion! / The CICA Windows Explosion! - Disc 1.iso / util / edithelp.zip / SAMPLE.PAS < prev    next >
Pascal/Delphi Source File  |  1995-03-10  |  265b  |  16 lines
  1. library sample;
  2.  
  3. uses WObjects, WinTypes, WinProcs, misc;
  4.  
  5. procedure func1(i: integer); export;
  6. begin
  7.   MyMessageBox(0,'The number is '+numstr(i,1),
  8.           'Sample.DLL', mb_OK + mb_IconExclamation);
  9. end;
  10.  
  11. exports
  12.   func1 name 'FUNC1';
  13.  
  14. begin
  15. end.
  16.